home *** CD-ROM | disk | FTP | other *** search
/ ROM Magic / ROM Magic.iso / pc / 01_kinb / o_fs / 00037_Script_37 < prev   
Text File  |  1994-10-06  |  1KB  |  67 lines
  1. on startMovie
  2.   global outtime
  3.   if not soundBusy (1) then
  4.     sound playFile 1, "O_Sound"   ---SOUND
  5.   end if
  6.   delay
  7.   when timeOut then go to marker (1)
  8.   set the timeOutLength = 5*60
  9.   startTimer
  10. end startMovie
  11.  
  12. on idle
  13.   if not soundBusy (1) then
  14.     sound playFile 1, "O_Sound"
  15.   end if
  16. end idle
  17.  
  18. on stepMovie
  19.   
  20.   if not soundBusy (1) then
  21.     sound playFile 1, "O_Sound"   ---SOUND
  22.   end if
  23.   
  24.   if the frame =5 then   ---LAST FRAME
  25.     delay
  26.     set the timeOutLength = 5*60
  27.     when timeOut then go to 1 of movie "O_Main"   ---MENU
  28.     startTimer
  29.   else
  30.     if the frame =2 then   ---ENLARGE
  31.       delay
  32.       set the timeOutLength = 10*60
  33.       startTimer
  34.     else
  35.       delay
  36.       set the timeOutLength = 5*60
  37.       when timeOut then go to marker (1)
  38.       startTimer
  39.     end if
  40.   end if
  41. end stepMovie
  42.  
  43.  
  44.  
  45. on teisi
  46.   puppetSprite 6,TRUE
  47.   set the castNum of sprite 6 to H12
  48.   updateStage
  49.   when timeOut then 
  50.   delay
  51.   set the timeOutLength = 10*60*60
  52.   when timeOut then go to marker (1)
  53.   startTimer
  54.   set the castNum of sprite 6 to H11
  55.   puppetSprite 6,False
  56. end teisi
  57.  
  58. on zokkou
  59.   puppetSprite 6,False
  60.   if the frame = 5 then   ---LAST FRAME
  61.     go to 1 of movie "O_Main"   ---MENU
  62.   else
  63.     go to marker (1)
  64.   end if
  65. end zokkou
  66.  
  67.